home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AOL File Library: 2,801 to 2,900
/
aol-file-protocol-4400-2801-to-2900.zip
/
AOLDLs
/
TAWUG
/
TAWUG Disk No. 20 (SHK)
/
TAWUG.20
/
CL
< prev
next >
Wrap
Text File
|
1986-03-17
|
512b
|
11 lines
0 REMAPPLEWORKS DATA DISK CATALOGUING PROGRAM
1 REMBY ROBERT J. SCHACK
2 REMDECEMBER 22, 1985
10 GOSUB 300
20 D$ = CHR$ (4): REMCONTROL-D DOS COMMAND
30 VTAB 14: HTAB A%(1): PRINT A$(1): REMPRINT CHECK PRINTER POWER MESSAGE
40 VTAB 16: HTAB A%(2): PRINT A$(2);: REMPRINT INSTRUCTIONS TO CONTINUE
50 GET KEYPRESS1$
60 HOME : REMCLEAR SCREEN
70 IF KEYPRESS1$ < > CHR$ (13) GOTO 40: REMIF ANY RESPONSE OTHER THAN <RETURN>, PRINT INSTRUCTIONS TO CONTINUE AGAIN AND WAIT
80 VTAB 14: HTAB A%(3)